Fix input method operation on read-only text

* lisp/international/quail.el (quail-input-method): Check also
read-only property of text in addition to the buffer's
read-only state.

diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index f42b594dc4680a2b3830b6d4147f71d0a42b2198..e91175fb832954b84abaef1d957d238c494c27fd 100644 (file)
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -1329,7 +1329,8 @@ If STR has `advice' text property, append the following special event:
 (defvar quail-conversion-str nil)
 
 (defun quail-input-method (key)
-  (if (or (and buffer-read-only
+  (if (or (and (or buffer-read-only
+                   (get-char-property (point) 'read-only))
               (not (or inhibit-read-only
                        (get-char-property (point) 'inhibit-read-only))))
          (and overriding-terminal-local-map